home *** CD-ROM | disk | FTP | other *** search
/ Aminet 24 / Aminet 24 (1998)(GTI - Schatztruhe)[!][Apr 1998].iso / Aminet / dev / c / AmiVoGL_MDEV.lha / drivers / ibmpc / vega_col.c < prev    next >
C/C++ Source or Header  |  1991-07-18  |  460b  |  32 lines
  1. #include <dos.h>
  2.  
  3. union REGS inregs, outregs;
  4.  
  5. static    unsigned        pal[17] = {0, 4, 2, 14, 1, 5, 3, 7,
  6.                                12, 10, 6, 9, 11, 13, 14, 15, 0};
  7.  
  8. extern    unsigned    int    _cur_color;
  9.  
  10. vega_color(i)
  11.     int    i;
  12. {
  13.     _cur_color = (unsigned)i;
  14.  
  15.     return(i);
  16. }
  17.  
  18. vega_setpal()
  19. {
  20.     unsigned    i;
  21.  
  22.     for (i = 0; i < 16; i++) {
  23.         inregs.h.ah = 0x10;
  24.         inregs.h.al = 0;
  25.         inregs.h.bl = i;
  26.         inregs.h.bh = pal[i];
  27.         int86(0x10, &inregs, &outregs);
  28.     }
  29.  
  30.     return(1);
  31. }
  32.